home *** CD-ROM | disk | FTP | other *** search
/ Libris Britannia 4 / science library(b).zip / science library(b) / COMMUNIC / NETWORKI / H202A.ZIP / UNPACK.BAT < prev    next >
DOS Batch File  |  1993-01-28  |  1KB  |  47 lines
  1. Echo Off
  2. REM UNPACK.BAT - Copies See Mail files to 4 x 360k diskettes.
  3.  
  4. if %1!==! Goto :Parms
  5. if %1!==?! Goto :Parms
  6. if %2!==! Goto :Parms
  7.  
  8. :Start
  9. For %%i in (A B D E F a b d e f) do If %1!==%%i! Goto :OK
  10. Goto :Parms
  11. :OK
  12. For %%i in (A B D E F a b d e f) do If %2!==%%i! Goto :OK1
  13. Goto :Parms
  14.  
  15. :OK1
  16. cls
  17. echo See Mail - Version 1.4 - February, 1993
  18. echo  
  19. echo UNPACK for 360k diskettes - using drives %1: and %2:
  20. echo  
  21. echo  »»»  You will need four formatted 360k diskettes  «««
  22. echo  »»»  You will need four formatted 360k diskettes  «««
  23. echo  »»»  You will need four formatted 360k diskettes  «««
  24. echo  
  25. pause
  26.  
  27. %1:unpack1 %2 %1
  28. goto :endbat
  29. :Parms
  30. cls
  31. echo 
  32. echo  
  33. echo UNPACK needs two parameters -
  34. echo  
  35. echo        First parameter is for the 3.5 diskette drive.
  36. echo        Second parameter is for 360k diskette drive to be used.
  37. echo  
  38. echo I.e. »»» UNPACK  A  B
  39. echo   or »»» UNPACK  B  A  etc, depending on which drives you have.
  40. echo  
  41. echo   A, B, D, E or F  are the valid drives accepted.
  42. echo  
  43. echo UNPACK will display the start screen, it will then ask you
  44. echo to put in each 360k diskette and copy the right files to each.
  45. echo  
  46. :endbat
  47.